Ucitati prirodan broj n i elemente niza x duzine n. Formirati i prikazati niz y od
elemenata niza x u obrnutom poretku.

Sub zad1()
Dim x(100) As Double, n As Long, y(100) As Double
Open "nizx.txt" For Input As #1
Input #1, n
For i = 1 To n
Input #1, x(i)
Next
Close #1
For i = 1 To n
y(i) = x(n + 1 - i)
Next
Open "y.txt" For Output As #1
For i = 1 To n
Print #1, y(i)
Next
Close #1
End Sub

